; Fix last ido patch

diff --git a/lisp/ido.el b/lisp/ido.el
index 5ba168b105a6eed2307966dbaa0b95534f0df514..23669d22d1a02daefece1e8115903d89dd4d788b 100644 (file)
--- a/lisp/ido.el
+++ b/lisp/ido.el
@@ -3678,7 +3678,7 @@ in this list."
                    ido-temp-list)))))
     (ido-to-end  ;; move . files to end
      (delq nil (mapcar
-               (lambda (x) (if (string-match "^\\." x) x))
+               (lambda (x) (if (string-match "\\`\\." x) x))
                ido-temp-list)))
     (if (and default (member default ido-temp-list))
        (if (or ido-rotate-temp ido-rotate-file-list-default)